Top 10k strings from Grand Prix (1988)(D&H Games).tap in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Games / [TAP] /
Back to the directory listing
3 ;" `";p(z,
3 "7";"M Menu"
3 "27";" PW"
3 "19";"`";p(l,
2 x=x+r(z,y):
2 x=x+e(z,y):
2 ;y$;" has joined ";
2 ;p$(z);"(";z;")";
2 ;"Who? "
2 ;"E Edit";
2 ;" ":
2 "7";h$(AD):
2 "61551",z:
2 "60400",AF:
2 "6";t$(z):
2 "6";s$(z):
2 "22";"`";r(w,
2 "22";"M Menu"
2 "2";x;" ";m$(x):
2 "10")=H(Z+
1 z$=z$+e$(z,t):
1 z$=z$+":"+
1 z$=z$+"& ":
1 z$=z$+" ":
1 x=x+r(z,y)*
1 x=x+d(c(z,y),
1 x$="Tyre":
1 x$="Fuel":
1 x$="Engine":
1 w=n(o(z,y)):
1 t(c(x,y))=
1 t$(c(k(x),
1 s F
1 r2+"."+n$(r)
1 r+"."+n$(r2)
1 r(z,y)=r(z,y)+
1 r(z,d)=r(z,d)+v:
1 r$(w,z)=r$(
1 pc
1 o(z,y)=t(c(z,y+
1 mn O}
1 m(z)=m(z)-
1 loader for grand prix manager
1 l$(gp)=d$(y):
1 l$(gp)=d$(c(v,x-v*
1 f(i)=f(i)*
1 e$(z,t)=" "
1 e$(c(k(x),
1 d$(l(z))=z$:
1 cd G
1 c(y,x)=l(z)
1 c(y,X)=L(Z)
1 b$(gp)=t$(c(t(
1 a$(gp)=d$(y):
1 `phfcs{}ldbs{}ldbs{}lga``````
1 ZZ=ZZ-(ZZ=
1 ZZ=ZZ+(ZZ=
1 WHICH DRIVER?&CURRENT TYRES: &CHANGE TYRES (Y/N)? &RAIN TYRES& INTERMEDIATE&SOFT& MEDIUM& HARD& 5 &4 &3 &2 &1 & LEADER: & OTHERS: & HAS CRASHED& HAS SPUN OFF TRACK& IS LOW ON FUEL& HAS RETIRED& IS OUT OF FUEL&SCORCHING &HOT &WARM &FAIR &MILD &MODERATE &COOL &COLD &VERY COLD &DAMP &CLOUDY &DRIZZLE &WET &RAIN &HEAVY RAIN<G:&FUEL&LOSS OF POWER& RUNNING ROUGH& BRAKE PROBLEMS& ENGINE PROBLEMS&THE MECHANICS LOOK IN TO IT...&NO FAULT THERE. PRESS 1,2 OR 3&ADAM PARKER &JIMMY JIMMY &N.PIQUET& N.MANSELL& A.SENNA& A.PROST& G.BERGER& S.NAKAJIMA& R.PITRESE& D.WARWICK& L.NANNINI& R.ARNOUX& P.GHINZANI& M.ALBORETTO& J.PALMER& E.CHEEVER& A.CAFFI& J.CAPELLI& S.JOHANSSON& P.STREIFF& M.BRUNDLE& G.FABI& A.CAMPOS& P.ALLIOT& T.BOUTSEN& A.DE CESARIS&C.DANNER& K.DALMOS& J.GORZA& O.GROUILLARD&M.GUGELMIN& P.FABRE&
1 WAGES SHIPPING COSTS HOTEL COSTS PETROL TYRES ENGINES GENERAL RUNNING
1 SCORCHING HOT WARM FAIR MILD MODERATE COOL COLD VERY COLD DAMP CLOUDY DRIZZLE WET RAIN HEAVY RAIN
1 R.Pitrese D.Warwick
1 Practice Laps Race Next Race Costs Fixtures Constructors TableDrivers League Employee Pool Crew Bank Loans Development Costs Bonus Pay Bookies Managerial Status Save Game
1 PPPPPPPPPP8888xx
1 PITSTOP: &SECS&WEATHER: &
1 OSSELLA V8 TURBO HONDA V6 TURBO FERRARI V6 TURBO BMW V8 TURBO ZAKSPEED V8 TURBOLOTUS V6 FORD COSWORTH V8 JAGUAR V12 LAMBORGINI V12 JUDD V8 C
1 N.Piquet R.Pitrese
1 N.Piquet N.Mansell A.Senna A.Prost G.Berger S.Nakajima R.Pitrese D.Warwick L.Nannini R.Arnoux P.Ghinzani M.Alboretto J.Palmer E.Cheever A.Caffi J.Capelli S.Johansson P.Streiff M.Brundle G.Fabi A.Campos P.Alliot T.Boutsen A.De CesarisC.Danner Y.Dalmas J.Gorza O.GrouillardM.Gugelmin P.Fabre
1 Kilman Duncan Dickens Fillon Tombey Moore Wallace Parker De SalisHuggard Smith Jones Neill McKay Miller Reid Scott Clarke Millan Douglas Gould Bell Young Green Murray Slater Kelly Dobson Freeman Newman
1 I(Z)=I(Z)+X
1 HARD MEDIUM SOFT INTERMEDIATERAIN TYRES
1 H(Z)=(C(Z,
1 H(K(V));" ";:
1 GOODYEAR DAMPERS BILSTEIN KONI PENSKE WHEELS FONDMETAL CARBONFIBREHERCULES SHOWA SPEEDLINE BLACKSTRIPEARROWED SPEEDTUNED
1 GGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGG
1 GGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGG
1 GGGGGGGGGGGGGGGGGGGGGGGGGGGGGGG
1 GGGGGGGGGGGGGGGGGGGGGGGGGGGGGG
1 GGGGGGGGGGGGGGGGGGGGGGG
1 GGGGGGGGGGGGGGGGGGGGG
1 GGGGGGGGGGGGGGGGGGG888888888888GGGGGGGGGGGGGGGGGGGG
1 GGGGGGGGGGGGGGGGGGG000000ppppp8
1 GGGGGGGGGGGGGGGGGGG000000000008
1 GGGGGGGGGGGGGGGGGGG000000000000
1 GGGGGGGGGGGGGGGG
1 GGGGGGGGGG000000000000
1 GGGGGG8888hh00(((88(888
1 GGGGGG8888hh
1 GGGGGG8888888PPPPPPPP88
1 ELF BENNETONJ.P.S. DUNHILL TYRELL MARLBOROCAMEL WILLIAMSMcCLARENLOLA LIGIER ARROWS MARCH BRABHAM
1 DUNLOP MOBIL CANON ICI DENIM PIRELLE BOSCH CAMPARI SHELL SILK CUTCASTROL ROTHMANSOLIVETTEAGIP
1 C Continue
1 Brazilian San MarinoBelgian Monaco Detroit French British German Hungarian Austrian Italian PortugueseSpanish Mexican Japanese Australian
1 Brazilian &San Marino&Belgian &Monaco &Detroit &French &British &German &Hungarian &Austrian &Italian &Portuguese&Spanish &Mexican &Japanese &Australian&
1 BENNETONBENNETON
1 AD=AD-(AD=
1 AD=AD+(AD=
1 ?*+,((,+*?
1 ;z$;" offer `";r;" ";
1 ;x$;" Sponsors"
1 ;t$(z);" offer you `";r:
1 ;s$(z);" do not agree. "
1 ;s$(z);" agree to the deal.";
1 ;s$(p(z,r));" pay you `";r2:
1 ;p$(z);"(";z;")":
1 ;p$(w);" "
1 ;"and ";r2;"% free ";x$;" supplies.":
1 ;"Who do you want to approach?"
1 ;"Who do you want to approach? ";
1 ;"Which team?"
1 ;"Which player to edit? "
1 ;"Which driver to bet on? "
1 ;"WEATHER: ";
1 ;"They do not wish to sponsor you":
1 ;"Team Director:";
1 ;"TYRES:";
1 ;"S Sack";
1 ;"Race laps:";G(GP,
1 ;"Prize money:";
1 ;"Press ENTER when finished."
1 ;"Press 1-5 for tyres":
1 ;"Player ";z;", enter your name:";
1 ;"PRIZE MONEY BONUS"
1 ;"PLEASE WAIT":
1 ;"O Other player"
1 ;"NEW LAP RECORD:":
1 ;"Mechanics:"
1 ;"Manager Rating: ";
1 ;"Loan:`2000000 repaid over 40 weeks at `75000 pw"
1 ;"Lap record ";Z$;" ";
1 ;"LAST YEAR'S WINNER:";
1 ;"LAPS:";g(gp,
1 ;"LAP RECORD:";
1 ;"Input the year to start at:"
1 ;"How much money do you want? ";
1 ;"How much (max `10000)? "
1 ;"How much ":
1 ;"Free fuel ";w$(p(x,
1 ;"Free engines";
1 ;"Free Tyres ";w$(p(x,
1 ;"Enter race Y/N":
1 ;"Enter new name (max 8 chars) "
1 ;"Enter new name (max 17 chars)"
1 ;"Enter new name (max 12 chars)"
1 ;"Engine Sponsors":
1 ;"Drivers:";
1 ;"Do you wish to play on(Y/N)?":
1 ;"DRIVERS LEAGUE":
1 ;"Chief Mechanic:";
1 ;"Change team sponsor name(Y/N)?"
1 ;"Change engine name(Y/N)? "
1 ;"Car Ratings: ";
1 ;"Bookies returns:";
1 ;"Bonuses:";
1 ;"A new player(Y/N)?":
1 ;"3 both want to employ"
1 ;"(max 12 chars)"
1 ;"(`10000-`100000)"
1 ;" `";p(x,
1 ;" `";p(l,
1 ;" Which team do you want to be? "
1 ;" ";v$(AF)
1 ;" ";e$(c(x,
1 ;" B Bet M Menu "
1 ;" C Continue "
1 ;" ":
1 ;" ":
1 ;" ":
1 ;" ";
1 ;" ":
1 ;" ":
1 888888888888
1 800GGGGGG8888888pp8888PP88
1 0GGGGGG8888hh00*(((((888
1 00GGGGGG8888hh(xx(((((888
1 000GGGGGG88888h(pp(hhh(888
1 *(((888888
1 )=d(c(z,d),
1 )=c(x,z-x*
1 );" wants to employ";
1 ));" ":
1 ((o(v,x-v*
1 "How much `";
1 "9";"O Other player"
1 "9");" ":
1 "9")+x+b(z,
1 "9")+(P(Z,
1 "850"-(AD=
1 "8";"On practice lap.":
1 "8";" ":
1 "700"-(AD=
1 "7";h$(z):
1 "7";"Load OLD Game Y/N"
1 "7";"DRIVER";
1 "7";"1 ";p$(
1 "7"*(a(z)<
1 "7"*(a(x)<
1 "7"*(a(v)<
1 "7"*(a(k(v))<
1 "7"*(H(RB)<
1 "65302",GP:
1 "650"-(AD=
1 "636"-(Z$="")
1 "61886"+(AA=
1 "61598"+((Y-
1 "61594",nc:
1 "61551"+z)+
1 "61531",f(z+
1 "60402",x:
1 "60309"=nc
1 "60309"+z,
1 "60308",g(gp,
1 "60287",x:
1 "60277",x+
1 "60269",x:
1 "600"-(AD=
1 "6";w$(z):
1 "6";d$(l(z));
1 "6";"WAGES";
1 "6";"Start OLD Game Tape":
1 "6";"New name?(max ";l;" chars)"
1 "6";"DRIVERS";
1 "6";"CONSTRUCTORS TABLE":
1 "6")+d(c(p,d),
1 "5E4")-(GP+
1 "500"+(AD=
1 "50";" PW"
1 "5";"M More";
1 "5";"LAPS";
1 "5";" ":
1 "5")=c(t(z,
1 "5"))<(c(k(z+
1 "4E4"*(c(z,
1 "400"+(AD=
1 "4";d$(y):
1 "4";d$(c(z,y+
1 "4";d$(c(v,x-v*
1 "4";a$(gp);
1 "4";"THIS SAVES IN
1 "4";"O Offer job";
1 "4";"Minor Sponsors"
1 "4";"M Menu"
1 "4");p$(z):
1 "4");d$(c(t(z,
1 "4")-(A(Z+
1 "300"-(AD=
1 "300"+(AD=
1 "29";c(k(v),
1 "29";"PTS":
1 "29";"PTS"
1 "28";m(z);
1 "28";d(l(z),
1 "28";"PTS"
1 "27";w;"/1":
1 "27";"EVENS":
1 "26";"WEEKS";
1 "26";"TO GO"
1 "22";a$(y)
1 "22";"`";y;" PE":
1 "22";"`";r(w,z)*
1 "22";"`";d(c(w,z),
1 "22";"WINNER"
1 "22";"LAPS"
1 "20";t$(c(t(z,
1 "20";"`";x
1 "20";"`";i(z);
1 "20";"`";e(z,y):
1 "20";"Retired.":
1 "20";" ";y;" "
1 "20"*(c(z,
1 "20")*(H(Z+
1 "2";z;" ";m$(z):
1 "2";z;" ";
1 "2";r$(w,z);" ";
1 "2";i$(y);
1 "2";d$(c(w,z));" ";d(c(w,z),
1 "2";"RACE":
1 "2";"PRACTICE LAPS":
1 "2";"POSITIONS"
1 "2";"POLE POSITIONS"
1 "2";"PLEASE WAIT":
1 "2";"NEW SEASON"
1 "2";"LAP TIME: ";z$:
1 "2";"FINAL POSITIONS";
1 "2";"END OF SEASON":
1 "2";"COSTS FOR LAST RACE";
1 "2";"CONSTRUCTORS";
1 "2";"BETTING"
1 "2")=d(c(t(z,
1 "2");"% ":
1 "2");" wants to employ";
1 "2"),q(z,y,
1 "2")*(o(v,x-v*
1 "2"))=B(Z,
1 "2"))<(d(l(z+
1 "2"))*B(Z,
1 "2" ;" ":
1 "1E5"*p(l,
1 "1E3"*p(l,
1 "19";b$(gp)
1 "1800"+(AD=
1 "18";G$(GP):
1 "18";"`";x:
1 "18";"`";H(Z+
1 "18";"R Race"
1 "18"*(f(x+
1 "17";t$(c(z,
1 "17";d$(c(p,d))
1 "1600"+(AD=
1 "16";t$(c(v,
1 "16";s$(p(x,z))
1 "1500"+(AD=
1 "15";r(w,z);"%";
1 "15";"2 ";p$(
1 "1300"-(AD=
1 "1300"+(AD=
1 "13";"TOTAL:":
1 "13";"M Menu":
1 "13";"M Menu"
1 "13";"E Edit"
1 "1200"-(AD=
1 "12";"PRESS";
1 "12")=H(z+
1 "12")=H(Z+
1 "12")-(H(Z+
1 "11";"PRESS";
1 "11";"C Continue":
1 "101"-d(y,
1 "101"-d(c(z,y+
1 "101"-d(c(p,d),
1 "101"-c(z,
1 "101"-c(t(
1 "101"-c(p,
1 "100"+(A(Z+
1 "100"*(r(z,y)>
1 "100")*A(Z+
1 "10";d$(c(p,d));
1 "10";"C Continue"
1 "10";" ":
1 "1";"1 or 2 player game?"
1 &
1 &
1
1